* coding.c (get_translation_table): Check Venable_character_translation.

diff --git a/src/coding.c b/src/coding.c
index 23690bc753b8ebdb952ae8c7e37eebc28ffebdd0..aeb2b3554938887c3c6c60e9e00e0921af1333f1 100644 (file)
--- a/src/coding.c
+++ b/src/coding.c
@@ -6623,6 +6623,12 @@ get_translation_table (attrs, encodep, max_lookup)
   Lisp_Object standard, translation_table;
   Lisp_Object val;
 
+  if (NILP (Venable_character_translation))
+    {
+      if (max_lookup)
+       *max_lookup = 0;
+      return Qnil;
+    }
   if (encodep)
     translation_table = CODING_ATTR_ENCODE_TBL (attrs),
       standard = Vstandard_translation_table_for_encode;